home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / tone.arc / TONEOFF.ASM < prev    next >
Encoding:
Assembly Source File  |  1985-11-26  |  512 b   |  15 lines
  1. ; ROUTINE TO TURN TONE OFF;
  2. toneoff proc    far
  3. ;
  4.         push    ax              ; save registers
  5. ;
  6. ; turn off timer 2 and speaker
  7.         in      al,61h          ; get port B again
  8.         and     al,11111100b    ; turn off timer and speaker
  9.         out     61h,al          ; now do it
  10. ;
  11.         pop     ax              ; restore registers
  12.         ret
  13. ;
  14. toneoff endp
  15.